home *** CD-ROM | disk | FTP | other *** search
/ Power CD / Power CD ATARI-Rechner Lieben.iso / DEMOS / HM2_DEMO / ONYX / HELLO.M next >
Encoding:
Text File  |  1992-11-21  |  1.3 KB  |  47 lines
  1. MODULE Hello;
  2.  
  3. FROM SYSTEM IMPORT CODE;
  4. (*
  5.  * Melden Sie ONYX.TTP in Clix unter ONYX im Pfade...-Dialog an.
  6.  * Wenn Sie diesen Text geladen haben, können Sie ihn mit SHIFT-F10 oder dem
  7.  * Menüpunkt Modula/ONYX assemblieren. Dabei werden die CODE-Anweisungen neu
  8.  * erzeugt.
  9.  *
  10.  * Allgemein werden Assembler-Passagen in "(*\=" ... "\*)" geklammert, wobei
  11.  * das öffnende "(*\=" am Zeilenanfang stehen muß. ONYX generiert daraus CODE-
  12.  * Anweisungen, die davor geschrieben werden. Es können mehrere Assembler-
  13.  * Passagen in einem Text auftauchen.
  14.  *
  15.  * Bitte beachten Sie:
  16.  *
  17.  * In der Demo-Version kann man nur insgesamt 80 Bytes assemblieren!
  18.  *
  19.  * Im Lieferumfang von ONYX ist ein ausführliches Handbuch und ein Online-
  20.  * Manual mit sämtlichen MC68000-Befehlen enthalten.
  21.  *)
  22.  
  23. BEGIN
  24. (*\ONYX v2.00    21.11.92 22:49*)(*$D-*)
  25. (*58 bytes of MC68030 code*)
  26. CODE(0487AH,0000EH);
  27. CODE(03F3CH,00009H);
  28. CODE(04E41H);
  29. CODE(05C8FH);
  30. CODE(04267H);
  31. CODE(04E41H);
  32. CODE(04D69H,07420H,04F4EH,05958H,02061H,07373H,0656DH,0626CH,06965H,07274H,00D0AH,06D69H,07420H,0484DH,03220H,0636FH,06D70H,0696CH,06965H,07274H,00000H);
  33. (*$D=*)
  34. (*\= 
  35. equ      GEMDOS  1
  36.  
  37.           pea      str(pc)
  38.           move.w  #9,-(sp)          ; Cconws
  39.           trap     #GEMDOS
  40.           addq.l  #6,sp
  41.           clr.w     -(sp)              ; Pterm0
  42.           trap     #GEMDOS
  43.  
  44. str      dc.b     "Mit ONYX assembliert",$D,$A,"mit HM2 compiliert",$0 \*)
  45. END Hello.
  46.  
  47.